home *** CD-ROM | disk | FTP | other *** search
/ Mac Power 1997 December / MACPOWER-1997-12.ISO.7z / MACPOWER-1997-12.ISO / MacPowerオリジナル / Edutainment World / チャンプジム for DEMO / DIR / shared.cst / 00002_Script_2 next >
Text File  |  1997-09-29  |  834b  |  39 lines
  1. on soundINIT
  2.   puppetSound 0
  3.   sound stop 1
  4.   sound stop 2
  5.   sound stop 3
  6.   
  7.   global SETTEI
  8.   if getAt(SETTEI,2) = 1 then
  9.     set the volume of sound 1 to 255
  10.     set the volume of sound 2 to 100
  11.     set the volume of sound 3 to 255
  12.   else
  13.     set the volume of sound 1 to 255
  14.     set the volume of sound 2 to 0
  15.     set the volume of sound 3 to 255
  16.   end if
  17. end
  18.  
  19.  
  20. on soundVolINIT
  21.   
  22.   global SETTEI
  23.   if getAt(SETTEI,2) = 1 then
  24.     set the volume of sound 1 to 255
  25.     set the volume of sound 2 to 100
  26.     set the volume of sound 3 to 255
  27.   else
  28.     set the volume of sound 1 to 255
  29.     set the volume of sound 2 to 0
  30.     set the volume of sound 3 to 255
  31.   end if
  32. end
  33.  
  34.  
  35. on soundVolGAME
  36.   set the volume of sound 1 to 100
  37.   set the volume of sound 2 to 255
  38.   set the volume of sound 3 to 255
  39. end